www.gusucode.com > 云网互动影视系统(12套模版和资源联盟) 6.2 > 云网互动影视系统(12套模版和资源联盟) 6.2.4/免费版/PlayerP2PForceTech.asp
<!--#include file="player.asp" --> <html> <head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> <title>原力p2p播放器</title> <style type="text/css"> <!-- body,td,th { font-size: 12px; color: #FFFFFF; } --> </style> </head> <body oncontextmenu="return false;" onselectstart="return false" ondragstart="return false" onkeydown="if(event.keyCode==78 && event.ctrlKey) return false;" leftMargin=0 topMargin=0> <% '=================================================================================================================== '软件名称:云网影视管理系统 'Copyright (C) 2002-2007 ywnt.net All rights reserved. '产品咨询QQ:489234,2813712 '程序版权:云网互动科技有限公司 '程序开发:云网互动科技有限公司 '官方网站:http://www.ywnt.net '郑重声明: ' 1、免费版本请在程序首页保留版权信息,并做上本站LOGO友情连接,商业版本无此要求; ' 2、任何个人或组织不得在授权允许的情况下删除、修改、拷贝本软件及其他副本上一切关于版权的信息; ' 3、云网互动科技有限公司保留此软件的法律追究权利 '=================================================================================================================== Set RS=Server.CreateObject(YWNT_TMS_RS) SQL="select P2PUrl from YWNT_TMS_Sever Where ID="&SeverID&" Order by ID desc" Rs.open sql,Conn,1,1 If Not RS.Eof Then SP2PID = split(Rs("P2PUrl"),"|") End If RS.Close Set RS = Nothing Set RS=Server.CreateObject(YWNT_TMS_RS) SQL="select filmid,ptl,[type] from p2pfilm Where vod=1 and filmid="&UrlID&" Order by filmid desc" Rs.open sql,Conn,1,1 If Not RS.Eof Then id=RS("filmid") ptl=RS("ptl") typex=RS("type") End If RS.Close Set RS = Nothing%> <table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td height="10" colspan="3"><table width="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="37"><img src="play/player_03.gif" width="37" height="27" alt="" /></td> <td width="900" background="play/player_04.gif"></td> <td width="104"><img src="play/player_06.gif" width="104" height="27" alt="" /></td> </tr> </table></td> </tr> <tr> <td width="8" height="100%" background="play/player_08.gif"></td> <td width="100%" valign="top" bgcolor="#000000"><table width="100%" height="100%" border="0" cellpadding="0" cellspacing="0"> <tr> <td width="959" height="27" background="play/player_10.jpg"><table width="90%" border="0" align="center" cellpadding="0" cellspacing="0"> <tr> <td width="91%">影片:<%=MovieName%></td> <td width="9%"><img src="play/player_16.gif" width="75" height="20" alt="" style="CURSOR: hand" onClick="ForcePlayer.FullScreen(1)"/></td> </tr> </table></td> </tr> <tr> <td valign="top" height="100%"><OBJECT id="ForcePlayer" codeBase="forceplayer.cab#version=2,0,0,1" height="100%" width="100%" data="DATA:application/x-oleobject;BASE64,mRHW/Ifh3UqI5ZryOEhtERAHAACtWAAAry0AAA==" classid="CLSID:FCD61199-E187-4ADD-88E5-9AF238486D11" VIEWASTEXT> </OBJECT> <Script language="JavaScript"> ForcePlayer.ShowControlPanel(1); ForcePlayer.AutoCloseShell(1); ForcePlayer.ShowBorder(0); ForcePlayer.SimpleSelectByURL("forcetv://stream/<%=id%>?tip=<%=SP2PID(0)%>&ptl=<%=ptl%>&type=<%=typex%>"); </Script></td> </tr> </table></td> <td width="8" background="play/player_12.gif"></td> </tr> <tr> <td height="10" valign="top"><img src="play/player_20.gif" width="8" height="10" alt="" /></td> <td height="10" background="play/player_22.gif"></td> <td height="10" valign="top"><img src="play/player_24.gif" width="8" height="10" alt="" /></td> </tr> </table> <%call connclose()%> </body> </html>